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INTRODUCING. - - 
— КОРЕ 164060 — 


-..h NEW UTILITY FOR THE 2981, T/S 1000 AND T/S 1500 


HAVE YOO EVER WANTED YTO--- 


.. CREATE A BIG REM LINE TO HOLD MACHINE CODE? 
... DELETE MORE THAN ONE PROGRAM LINE AT A TIME? 
see FIND THE ADDRESS OF A PROGRAM LINE? 

. FIND THE LENGTH ОЕ A PROGRAM LINE OR LINES? 

. FIND THE ADDRESS OF A STRING VARIABLE? 

. MOVE SELECTED DATA TO SOMEWHERE ELSE IN MEMORY? 
... HAVE 1/0 ROUTINES АТ YOUR COMMAND? 
... CONVERT A HEX NUMBER TO ITS DECIMAL EQUI VELENT? 
... CHANGE ВАМТОР WITHOUT HAVING TG EKECUTE NEW? 
... MOVE A WHOLE PROGRAM TO HIGH OR LOW RAM AND BACK? 
... MOVE ALL VARIABLES TO HIGH OR LOW RAM AND BACK? 
... SAVE SELECTED DATA TO TAPE VERY RELIABLY? 


„++ SAVE ALL VARIABLES TO TAPE VERY RELIABLY? 


NOW YOU CAN---WITH KAPKIT 1000 


CHECK OUT THESE FEATURE: 


“ 


1. КАРКІТ IS WRITTEN IN 1065 BYTES OF MACHINE CODE. 

2. ІТ IS RELOCATABLE TO ANYWHERE YOU HAVE FREE RAM. 

3. EACH ROUTINE WILL STAND ALONE: THOUGH ALL CALL 1.1.5. 

4. А "USR" CALL AND DATA ENTRY ARE MADE IN THE SAME ІЛМЕ. 

5. DATA САМ BE INPUT AS DECIMAL; НЕХ, VARIABLES OR EXPRESSIONS. 


6. ALL ROUTINES CAN BE CALLED FROM PROGRAM LINES OR IN THE 
IMMEDIATE COMMAND MODE. 


7. KAPKIT DOES NOT USE MEMORY IN THE SYSTEM VARIABLES AREA. 


8. KK COMES WITH A TUTORIAL MANUAL. 


KK i= EADY TO Яғ. 


= CHANGE RAMTOP TO 65536: "RAND USR 169823465536" 
- SAVE ALL VARIABLES TO TAPE: "RAND USR 172323 " 
= MAKE А 450 BYTE "1 REM" LINE: “RAND USR 16672:341344507 


ORDER NOW + 


LST Software E. Arthur Brown Co. 
PO Box 62 3404 Pawnee Drive 
Alcester, SD 357001 Alexandria, MN 56308 


КАРКІТ 10800 at $14.95 plus $1.95 shipping. 


14 page manual alone (no tape) at $3.95 from LST 
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City Сат PPW 1 


КАРКІТ 1000: Copyright 1987 by Chuck Peterson 


КАРКІТ 1009 


Copyright 1987 
by Chuck Peterson 


Chuck Feterson 
Box 98 
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INTRODUCTION 


KAPKIT is a utility program for the 2Х81, 751000 and Т51500 written in machine 
code. Routines included are REM line generator, 1іпе(5) delete, line address, 
lineis) length, string address, copy (LDIR and ІШІК), IN, QUT, change ramtop, 
hex/dec converter, RAM save, RAM load, tape save, tape load, bytes free and 
system variables’ addresses. KK is written with all jumps relative so it can be 
relocated anywhere you have free ram. Each routine is seperate from the others 
and can stand alone (though most make use of the Interger Input Subroutine). A 
USR call and data entry are made in the same line. All of the routines can be 
called in the immediate command mode or from program lines. None of the system 
variable locations are used for temporary storage, so there should be no 
conflicts with other programs. 


KK was written in reponse to a frustration. The Timex BASIC ROM is limited by 
size in what it can do. Machine code routines add versatility, but inputting 
more than one number to a machine code routine is cumbersome. To make it easier, 
an input subroutine, IIS, was written. The Integer Input Subroutine (IIS) is the 
heart of KAPKIT. It provides a unique way in inputting numbers to machine code 
routines. You can input up to three numbers (decimal or hexidecimal), variables, 
or expressions in the same line that makes the USR call. AS a bonus, you can 
adapt your favorite machine code routines to use IIS. 


1 wish to express my appreciation to the "SyncWare Three" for the assistance 
given in support of this project. 


KAPKIT'S MENU 


Load KAPKIT with the command, LOAD "KK". It will take about 3 minutes and 15 
seconds to load. Once loaded, the following Menu will appear: 


KAPKIT 1000 
1. LIST 4. DECIMAL OFFSET 
2. RELOCATE 3. NEW 
3. SAVE 


Choose your Menu option by typing the number keys 1 through 5. The LIST option 
LISTs the program starting at line 100. You can use it to STOP the program. 
Another way to stop the program is to press BREAK. To restart the program use 
the RUN command or GOTO 1500. Lines 100ff give the program name, machine code 
starting address, length of machine code and other information. Lines 300 to 
1498 show how to use the various routines in KAPKIT. 


The RELOCATE option will relocate the KAPKIT machine code above ramtop or to any 
address you specify. It makes a copy of the the code, leaving the original code 
intact in the 1 REM statement. When you press "2", you will be given another 
menu with three options in it. The first will lower RAMTOP automatically and put 
a copy of KK above the new RAMTOP. The second asks you to input a new starting 
address for KK and copies it to that address. The third option asks for а new 
starting address, but does not copy KK to the new address. Use this third option 


iuf 


to print a chart of the routines and their new calling addresses without 
relocating KK. All three options end by printing a chart of the routines and 
Ёһеіғ ‚пем addresses. When the chart is оп screen, you сап make a COPY of the 
screen by typing "C". Be sure to make one. You'll need a copy of the addresses 
(on paper) in order to use KK. I've relocated KK to ay Hunter Board, to 8К-16К 
non-volitile memory. 


The third option, SAVE, allows you to make a back-up copy of KAPKIT. When you 
load the program for the first time, make a back-up copy. Use this copy as your 
working copy and store the master tape in a safe place. When you choose the SAVE 
option you will be asked if you want lines 300 to 1490 deleted. Press "Y" for 
Yes or "М" for No. Deleting the lines results in shorter SAVE and LOAD times. 
When making your first back-up, answer "N" and save the whole program. 


The fourth option is the DECIMAL OFFSET calculator. To understand its use, read 
the section (later on) about adding your own routines. 


The final option is NEW, which will wipe out (erase from below RAMTOP) the KK 
program. 


HOW TO USE KK 


KAPKIT is fun to use, but will take time to learn. The routines are very 
powerful. There is error checking, but KK can do things which will crash your 
computer. This is especially true of the copy routines (LDIR and LDDR). None of 
the routines check to see if you are overwriting the D-FILE, Variables or the 
stack. They must be used with care. Don't let the possibility of a crash 
discourage you, though. Know that you will crash occassionally. Everyone does. 
Plan ahead; save your new programming to tape before testing it! 


KAPKIT doesn't have any input prompts because it's designed as a collection of 
building blocks, not a complete system. It does its work. in a program without 
pausing for inputs. You can add your own building blocks, too. Later on there is 
a section which tells you how to program your favorite machine code routines to 
call IIS. At first you'll have to refer to the back of the documentation often. 
The routines are listed there, as well as information on what data needs to be 
input and the order in which to input it. Refer there as often as necessary. 
After a while, you'll remember what's needed for your favorite routines. Be sure 
to experiment with KK routines before using them to do serious work. 


The following tutorial will guide you in using the various routines. It shows 
some of the things KK can do. The examples assume that KK has been loaded, but 
not relocated. With the MENU on screen, press BREAK or option "1", then type іп 
the examples. 


Since KK can be relocated, offsets are given after the name of each routine in 
the REM lines. LIST line 320 to take a look at it. "S" (in the parenthesis) 
stands for "STARTING ADDRESS." The offset for REMGEN is "*158." If you relocate 
KK so that it begins at 8192, then "S" equals 8192. REMGEN would then be called 
at 81924158, which is USR 8350. Тһе RELOCATE menu option uses these offsets to 
calculate the new calling addresses. When the program is first loaded, the KK 
machine code is located in line 1 REM. This tutorial assumes that KK has not 
been relocated and its STARTING ADDRESS is 16514. 


и 


INTEGER INPUT SUBROUTINE 


115 is normally called by the other routines, but it сап be called directly. The 
following examples call it to show how to input integers. IIS reads integers it 
finds after the USR call. It places them in the HL, DE, and BC register pairs. 
The stack is adjusted so the computer thinks the line ends with the USR call. 
Thus, the integer in the BC register pair will be returned at the end of the 
call. Examples tell the story best. Type the following command. The double 
asterisk is the “raised to the power of" math function. To type it, hold the 
shift key down and press the letter "H." Whenever you come to an immediate 
Command (as below), type it in and press ENTER. 


PRINT USR 16514**1 


The number "1" is printed to the top of the screen. How did it get there? IIS 
read the number after the double asterisk. "1" was placed in the BC register 
pair and the computer printed it. Actually, "1" was placed in all three register 
pairs. Here's a summary of the results of inputting up to three integers. Try 
all three print commands to see the results. The number in the BC register pair 
will always be printed. 


PRINT USR 16514**1 
(HL = 1 DE = 1 BC = 1) 


PRINT USR 16514**1**2 
AHL = 1 DE=2 ВЕ = 2) 


PRINT USR 16514%#1#*2##3 


(HL-1 DE22 ВС = 3) 


Some users of this utility may be new at making USR calls. Try them. You won't 
hurt your computer. The worst that can happen is a crash. A crash is | 
frustrating, but not fatal. There іс one thing you сап do to make calls a little 
easier. Assign the called address to a variable. 


LET 115=16514 
PRINT USR IIS#*#3 


115 reads hex numbers. There are two rules for inputting them. First, always 
start the number with the letter "H." Second, always input a four digit hex 
number after the "H." Anything else will produce an error report. Try: 


PRINT USR 18514%%Н0010. 


The screen reads "16" (decimal) which is the same as "10" (hex). You can mix hex 
and decimal numbers in the input line. ' i 


PRINT USR 16514**5**xH0020. 


The screen reads "32" (decimal), which is the same as "20" (hex). 


IIS reads variables and evaluates expressions. Туре in а short program and RUN 
it. 


1@ LET A=10 

20 LET B-20 

38 PRINT USR 16514**A4 
40 PRINT USR 16514**A*B 
80 STOP 


The decimal numbers "10" and "36" are printed to the screen. There are three 
things to remember about expressions. You cannot use the "raised to the power 
of" math function within a KK expression. Do such math before a KAPKIT call: LET 
1-Аж%2, then PRINT USR 18514%%7. A letter "H" (immediately following a double 
asterisk) will always be interpreted as the beginning of a hex number. If you 
have a variable called "H," enclose it in parentheses, (H). The same goes for a 
variable name beginning with "H," (HOMERUNS). Finally, you cannot mix decimal 
numbers and hex numbers in the same expression. The routine that reads hex 
numbers looks for a single hex number. 


IIS does a true rounding off on numbers. If you input 3.4, it returns the number 
3. If you input 3.5, it returns the number 4. 


PRINT USR 16514**3.4 
.PRINT USR 16514##3.5 


Тһе "жж" sign after a USR call is not regarded by IIS as a math symbol, but as 
an expression separator. No math after the call is calculated. However, math - 
expressions put before the USR call will be evaluated. For example, try: | 


. PRINT S+USR 16514**10 


"5" (decimal) is added to "10" (decimal) and the result, "15," is printed to the 
screen. This characteristic will come in handy later. Delete lines 10 through 
40. 


You will probably find yourself referring back to this suction quite a few times 
until you get the hang of inputting integers. Take your time and refer back as 
much as necessary. Flexibility in inputting numbers is one of the great features 
of KAPKIT. : : 5245 


КЕМБЕМ 
...ШӘН 16672**LINE М0.%%5РАСЕВ 


БЕМБЕМ inserts а REM line into the program listing. You specify the line number 
and the number of blank spaces the line is to have. REM lines are often used to 
hold machine code. This routine creates big REM lines very quickly, but start 
small. Generate a 10 REM line with 3@ spaces in it and an "A" REM line with 
@@1Ah spaces. Do so by typing in the following program and RUNning it. First, 
delete line 10 of the previous example. | 


20 RAND USR 16672**10**30Q 

30 LET 4-50 

40 LET ADDR=5+USR 16672**A**HQ 
014 

80 STOP 


LIST 10 to see lines 10 and 50 REM which REMGEN inserted into the program 
listing. ADDR holds the address of the first blank space in the line 50 REM. To 
write machine code to line 50, start writing to the address assigned to ADDR. 
REMGEN returns the address of the very beginning of the REM line, pointing to 
the first byte of the line number. The number "S" was added to that to return 
the address of the blank space which follows the REM token. 


The code of the character which fills the REM line is located in 16728 (4158h). 
It is currently a "0," which prints as a space. Change it to suit your taste. To 
fill the REM line with "X's," POKE 16728,61. 


Üne special note about large REM lines--some immediate commands will cause the 
screen to roll... and roll... and roll... and never stop until you pull the 
plug. If you make a line 100 REM with 1000 spaces in it, immediately add the 
line 101 REM. Actually, you can add any program command you want, but make sure 
you have a line 101. Never delete line 101. This will help prevent the rolling- 
crash. Also, if machine code (in a big REM line) is LISTed on the screen and it 
has a code 118d (76h) in it, you might crash. It's best not to LIST such a line. 
KAPKIT will not crash if you list line 1 REM, the line that holds its machine 
code. 


DELETE 


ea USR 15757**LINE №. 
«s USR 15757**18T LINE NO.**2ND LINE №. 


The DELETE routine will delete one or more program lines. It's handy for 
deleting a whole block of lines. The KAPKIT program uses it in the SAVE option 
(see line 3080). Delete lines 10 and 50 with: 


RAND USR 16757**10 
RAND USR 16757**50 


LIST those lines to see that they are gone. Delete will delete blocks of program 
lines, too. Input the numbers of the first and last (2nd) program lines to be 
deleted. They and everything in between will be deleted. Try out a running 
program which deletes part of itself! Add the following program lines and RUN 
the program again. 


60 RAND USR 16757**10**60 
70 PRINT "DONE" 
80 STOP 


All of the program lines have been deleted except Lines 70 and 80! If you ask to 
delete a line whose number is not in the listing, no problem...nothing will 
happen. Clean up the listing by deleting. line 79. 


LINADDR 
...ШӨҢ 16823**LINE №. 


This routine will return the beginning address of апу program line. Find the 
address of the first line: 


PRINT USR 16823**1 


The address 10509 is printed to the screen. You can even find the address of the 
Display File: 


PRINT USR 16859%*10000 


The address returned is for the beginning of the D-FILE, the 118d marker, and 
PRINT position "@,@" is located one address higher. 


LINLEN 


...05В 16836**LINE NO. 
— ...USR 18836%%15Т LINE NO.**2ND LINE №. 


LINLEN returns the length of one or more program lines. An empty REM line 
contains six bytes: two for the line number, two for the length, a REM code and 
an end of line marker. Check this out with: 


PRINT USR 15836**120 


«Тһе length of a whole block of program lines can be determined. Find out how 
many bytes of program are in KK, lines 1 through 5060: 


PRINT USR 16836**1**5050 


STRSADDR 
...USR 16880**CODE STRING 


STR$ADDR returns the address of any string variable in memory. Here are some 
program lines to assign А% some letters, find the address of the start of A$ and 
print the first character. They then find the address of A$(3) and print A$(3). 
Notice the unusual use of the CODE function. It doesn't make sense that the 
function "CODE" should return an address. It has to be used because of the 
syntax called for after a double asterisk (raised to the power of). It's an 
idiosyncrasy of this routine. RUN the program; delete it when done. 


18 LET A$="XYZ" 

20 LET ADDR1-USR 14688@**CODE A 
$ 

30 PRINT CHR$ PEEK ADDR1 

40 LET ADDR2-USR 16680**CODE A 
$(3) 

50 PRINT CHR$ PEEK ADDR2 

8a STOP 


г 


LDIR апа LDDR 


LDIR: ...USR 16922**S0URCE*«*DEST.**NO. OF BYTES 
LDDR: ...USR 16940*#*SQOURCE*#DEST.*##NO. OF BYTES 


The two copy routines are named after the 780 instructions they use. Both move 
large blocks of data very quickly. Data must be input in the following order: 
SOURCE address, DESTination address, and NO. OF BYTES to copy. Here's a program 
which makes a "50 REM" line with 20 spaces in it. Then it copies the first 20 
bytes of KK machine code to the new REM line. Line 18 generates the REM line, 
and line 20 copies the data. The SOURCE is good old 16514. The DESTination is 
the address REM GEN returns plus five. The NO. OF BYTES is 20: 


10 LET DEST=5+USR 15672**50**2 


Q 

20 RAND USR 16922**165144**DEST 
##20 
RUN the program and LIST 18. Take а look at line 50 to see the result of the 
copying. LDIR increments addresses as it copies data -- it copies data "bottom- 
up." 
LDDR copies data in the opposite direction -- "top-down." The addresses are 


declemented. Delete line 50 to make room for a demonstration of ІШІК. Edit the 
program lines. This time REM GEN will return the address of the end of the REM 


line. This is accomplished by adding 24 to the address which USR 14672 returns. 


| Line 30 will ask to copy 10 bytes. 


10 LET DEST=24+USR 15672**50** 
29 

20 RAND USR 15940%%15514-19%%П 
EST««10 


RUN the program and LIST it. Line 50 will again have been added and has 10 bytes 
of KK machine code copied to it. 


Delete lines 10 through 58 to clean up the listing. The DELETE routine can be 
used: 


RAND USR 10757%%10%%50 
IN and QUT 


IN: ....USR 16958**PORT 


OUT: ...USR 16970**PORT**DATA 


151880 BASIC does not have 1/0 commands. IN will return the data from an 1/0 
port. To input data through port 33d, use: 


LET A=USR 16958*433 
PRINT 4 


You can also send data out through a port. If you want to output 143d through 
port 55d, then use: 


RAND USR 16970*455*4143 


RAMTOP 
...USR 16982%%МЕМ RAMTOP 


Have you ever wanted to change ramtop without having to execute NEW? This 
routine will do it in a flash. I am indebted to Richard 5. Erwin for RAMTOP, 
which was first published in "Pro/file Updates." To lower ramtop to 26K, use any 
of the following commands: 


RAND USR 1698244256524 
RAND USR 16982**26*1024 
RAND USR 16982**H5800 


The first command uses a decimal number. The second uses a decimal expression, 
26 times 1K (1K is 1024 bytes). The third uses a hex number. All yield the same 
result. After trying the above, confirm that ramtop was changed. PEEK the system 
variable, RAMTOP: 


PRINT PEEK 16388,РЕЕК 16389 


The results should be Qd and 104d. 


HEX/DEC 
RAND USR 17021%%М0. 


Üne way to convert a hexidecimal number to a decima! number is to use 115: PRINT 
USR 145514*«HQ010. This example was given you earlier. HEX/DEC converts numbers | 
both ways. It prints a decimal number and its hexidecimal equivelant to the 
screen. Try the following, inputting a dec and a hex number. 


RAND USR 17021%%1000 
RAND USR 17021**HQ14F 


It also can be used in a short BASIC program. The program asks for an input and 
then prints the conversion to the screen. 


10 DIM A$(13) 

20 LET A$-"USR 17021%%" 
30 INPUT A$(8 to ) 

40 SCROLL 

58 SCROLL 

68 RAND VAL ñ$ 

78 GOTO 30 


Run the program and when the cursor prompts you, input a hex or a dec number. 
Remember that when inputting a hex number, you must begin it with the letter "Н" 
and follow the "Н" with four characters (they must be 0-9 ог А-Ғ). An incorrect 
entry will cause the program to stop with an error report. Delete lines 10 
through 7@ using the DELETE routine. 


RAND USR 15757**10**70 


RAMSAVE and RAMLOAD 


Program Save: ....USR 17100**P«*xDEST 
Variable Save: ...USR 1710Q0#*#V**DEST 


Program Load: ....USR 17164**PXxS0URCE 
Variable Load: ...USR 17164**V*xSÜ0URCE 


RAMSAVE and RAMLOAD are intended for use in a system where the addresses 48K to 
64K have 16K banks of RAM available. The OUT routine can be used to access the 
different banks. Programs and/or all variables can be saved to that area of 
memory with RAMSAVE and called back again with RAMLOAD. However, you do not have 
to have bank switching to use them. Try them out. Reset RAMTOP to 24K, move the 
whole program above ramtop, then bring back a copy from high storage. Line 10 
will reset RAMTOP to 24K. Line 20 will move the program to that location. Type 
the following program lines: 


10 RAND USR 16982**24576 

26 RAND USR 17100#*#P#*24576 
30 LIST 100 

80 STOP 


RUN the program. It will stop after executing the LIST command. Type NEW and 
ENTER. The program area will be empty. Now for the big test. Ask the stored 
program to return a copy of itself to the program area. 


_ RAND USR.2535@##P 4424576 


Press ENTER and, if all is well, the program is back and listed in less than a 
second. 


You can save all variables to RAM. Add the following lines and RUN them: 


10 LET A$="VARIABLES " 

20 LET B$="MOVED" 

30 RAND USR 17100*Vx*24576 
80 STOP 


A copy of all variables now resides at 24576d. Press CLEAR and ENTER and try 
PRINT ñ$ and ENTER. Error report "2/0" indicates that ñ$ is no longer present. 
Bring the variables back and print them: 


10 RAND USR 17164*xV**24576 
20 PRINT A$ 

36 PRINT B$ 

80 STOP 


RUN the pragram. The variables have been restored to the program! Delete lines 
18-70 and then reset ramtop with: 


RAND USR 16757**10**70 
. RAND USR 16782**H8000 


10 


TAPESAVE and TAPELOAD 


Binary Save: ......USR 17232*##B**SOURCE*#NO. OF BYTES 
Variables Save: ...USR 17232*«V 


Binary Load: ......USR 17349**B**DEST 
Variables Load: ...USR 17349 «4V 
"Y" Load: .........USR 17349**X**«DEST*«NO. OF BYTES 


TAPESAVE and TAPELOAD are extensions of the regular Timex cassete tape routines. 
The Timex routines save and load programs. The "B" (Binary) option of these 
routines saves/loads any data from/to anywhere in memory. The "V" (Variables) 
option does the same with all variables. Both routines use the Timex machine 
code, showing the familiar black bars on screen when saving and loading. When 
loading, you'll notice that the pattern on the screen is slightly different 
during a silent spot. This is normal. The load routine has one added feature, 
the "X" load. It will load any Timex tape anywhere in memory. 


Save differs slightly from The Timex save. The screen goes blank for 3 seconds, 
a short header is sent to the recarder (consisting af the letter "B" or "V" and 
the length of the data), there's another 3 seconds of silence and finally data 
is sent out. When you save files, you do not give them names. This break from 
convention was done to keep KK machine code as short as possible. Floppy disc 
systems need file names to locate a file on a disc. Cassette tape systems do not 
need them as much. Cassettes require one to locate the file manually, using the 
tape counter on the recorder. One normally has to write the counter-number and 
name of program on the cassette to keep track of program location. So a recorded 
file name is helpful, but not absolutely necessary. When using the KK SAVE he 
sure to write down what you have saved and the counter-number on the cassette or 
a nearby piece of paper. It takes a little extra time, but it's time well spent. 


Try out the Binary Save with the following program. It finds the address of REM 
line 10, pauses and prompts you, saves the data in it to tape, pauses and then 
loads the same data from tape to REM line 15. Put a blank cassette in the 
recorder and RUN the program. When prompted start the recorder in "record" mode 
and press any key. 


10 REM 12345 

15 REM XXXXXX 

20 LET ADDR=5+USR 165823**10 

25 PRINT "SAVE:",,,,"START REC 
ORDER - PRESS ANY KEY" 

30 PAUSE 4Е4 

35 RAND USR 17232**#B**#ADDR*#5 

40 CLS 

45 PRINT "LOAD:",,,,"REWIND TA 
PE",,, “PLAY THE TAPE - PRESS АМ 
У КЕ 

50 LET ADDR=5+USR 16823##15 

55 PAUSE 464 

80 RAND USR 17349##B*##ADDR 

65 LIST 10 

80 STOP 


The number 12345 has been loaded into REM line 15, which used to contain the 
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letters "XXXXX." Delete lines 10 to 65 with the command: 


RAND USR 16757**103**65 


Now go on to the Variable commands. Define a couple of variables and save them 
to tape. Type in the program and RUN it. Start your recorder and save the 
variables when prompted to do so. | 


10 LET A$="ALL VARIABLES" 

20 LET B$="WERE SAVED" 

30 PRINT "SAVE:",,,,"START REC 
ORDER - PRESS ANY KEY" 

40 PAUSE 4Е4 

50 RAND USR 17232%жу 

80 STOP 


All of the variables are now on tape. Rewind the tape. Type CLEAR and ENTER. 
This erases all variables from the computer’s memory. Confirm it by typing PRINT 
A$ and ENTER. The error report 2/0 indicates А% is not present. Play the 
recording of the variables back into the computer using the following program. 


10 PRINT "LOAD:",,,,"START REC 
ORDER - PRESS ANY KEY" 
20 PAUSE 4Е4 
30 RAND USR 17349 
40 CLS 
22950 PRINT A$,B$ 
88 STOP 


The words, "ALL VARIABLES WERE SAVED" are printed to the screen, showing they 
were loaded from tape. 


The "X" Load is a special routine. It will load any Timex tape. You must specify 
the address data is to be loaded to. You must also specify the number of bytes 
to be loaded. If you tell it to load 1000 bytes when there are only 980 bytes ап 
the tape, the program will stop with an error report after loading 980 bytes. 
This doesn't mean the load was faulty. It means the number of bytes was 
incorrect. Here's a program which loads the first 15 bytes of any tape to A$ and 
displays А% on screen. Type it in. 


10 DIM А%(15) 

20 LET ADDR=USR 14880**CODE A$ 

30 PRINT "LOAD:",,,,"START REC 
ORDER - PRESS ANY KEY" 

40 PAUSE 4E4 

58 RAND USR 17349**X* ÓsaDDR«* 15 

60 CLS 

78 PRINT А% 

80 STOP 


Pull out any Timex program tape that's handy. Put it in your recorder and RUN 
the program. When prompted, start playing the tape and press any key. The 
routine will load the beginning of the tape into A# and print it to the screen. 
The "X" Load will load any Timex, Memotext or Hot-Z save. Delete lines 10 
through 70: RAND USR 15757**10**70 


12 


BYTES FREE 
»USR 17542 


This routine returns the space available for additional program lines or 
variables. It is called "Spare" in the Timex/Sinclair manual (P. 128). BYTES 
FREE, and the remaining routines as well, does not call IIS. Find out how much 
space is left in the KAPKIT program. 


PRINT USR 17542 
| SYSTEM VARIABLES 


The final routines are included for convenience. They return the addresses of 
system variables--in this case, the boundary lines betwen different sections of 
memory. See the Timex/Sinclair manual (Chapter 26, p. 128, Organization of 
Storage) for further clarification. Type in a short program which prints the 
various addresses. 


10 PRINT "DISPLAY FILE";TAB 20 
058 17559 

20 PRINT "START OF VARIABLES"; 
TAB 20;USR 17564 

30 PRINT "END OF VARIABLES" ;ТА 
B 20;USR 17569 

40 PRINT "RAMTOP";TAB 20;USR 1 
2914 —— n LS 

88 STOP 
Run the program to see the current status of the addresses. Write down the 
addresses (оғ COPY the screen.) See what adding a program line does. Add the 
following: 


50 REM XXXXXXXXXX 


RUN the program again and compare the addresses with the ones printed before. 
All of them, except RAMTOP, will have increased. Delete line 50. What will 
happen if you add a variable? ENTER the following commands: 


.DIM А%(10) 
GOTO 10 


The address of the D-FILE and VARS stay the same. The address of the end of the 
variables area, E-LINE, increases. RAMTOP stays the same. 


RELOCATING KAPKIT 


There^s another way to relocate KK besides using the main menu -- LDIR can be 
used in the immediate command mode. The SOURCE address will be 16514 and the 
number of bytes in the utility is 1065. Specify the DESTination. To move it to 
8192 (4000h), for example, use: 


RAND USR 16922*4156514**8192**106 
9 
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You don't have to move all of KAPKIT. If you don't need the TAPE SAVE/LOAD, 
BYTES FREE, and address routines, move 718 bytes instead of 1085. The number of 
bytes was found by subtracting the starting address of the machine code from the 
address of the beginning of the TAPE routines (17232 minus 16514 equals 718). 


ERROR REPORTS 


KK will return standard reports of "undefined variable," "out of memory," 
“integer out of range," etc. It also reports the following: 


с REM GEN, DELETE, LINLEN - invalid line number 
E IIS - first "x" omitted, incorrect hex entry 
F RAMSAVE, RAMLOAD - "P" or "V" omitted or incorrect 


TAPESAVE, TAPELOAD - "B", "V" or "X" ommitted or incorrect 
out of memory for loading variables 


ADDING YOUR QWN ROUTINES 


You can add routines, but some knowledge of machine code is required. Have your 
routine call the Integer Input Subroutine to pick up integers . Make use of the 
trick explained in SyncWare News, NOV.-DEC. '84, "Machine Code Topics," pp. 15- 

с 16. There's no room to add routines in the 1 REM line. Using REM GEN, make а 3 

~ REM line with, say, 1200 spaces in it and copy KK machine.code- to it.using- LDIR:. 


4 REM 

10 LET ADDR-5*USR 16672**3**12 
09 

20 LET ROUTINE=USR 15823**1551 
4**ñDDR*#*1066 

30 STOP 


RUN the program. The variable ROUTINE holds the address where your routine will 
begin. There are three lines of mnemonics which make the IIS call. They will 
usually be the first instructions in the your routine. Other instructions can 
preceed them, but must not alter the data in the BC register pair. 


LD HL,Offset (where Offset is a number) 
ADD HL,BC 
CALL @ACA 


The "DECIMAL OFFSET" option of the menu will calculate offset for those who do 
not have HOT-Z. For those who have it, HOT-Z is great for calculating Offset. In 
the READ mode, type in the starting address of your routine. Go into the WRITE 
mode. Set the END to the starting address of the IIS subroutine. Press Shift-ü. 
END minus CURSOR (E-K) will equal the Offset needed. 
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TABLE OF "USR" CALLS 


115 ...ШЕК (5) 


_ REMGEN ...USR (S*158)**LINE NO.##NO. OF SPACES 
DELETE (ONE LINE) ...USR (5+243) *«LINE №. 
(TWO OR MORE) ...USR (S+243)##1ST LINE NO.*«2ND LINE №. 
LINADDR ...USR (S*309)*«LINE ND. 
LINLEN (ONE LINE) ...USR (S*322) **LINE ND. 
(TWO OR MORE) ...USR (8*322)4«18T LINE NO.**2ND LINE №. 
STRSADDR ...USR (S+366)#*CODE STRING-VARIABLE 
LDIR (COPY-UP) ...USR (84408) #*#SOURCE**DESTINATION®#NO. OF BYTES 
LDDR (COP Y-DOWN) ...USR (84420) X SQURCE**DESTINATION*xNO. OF BYTES 
IN _ «..USR (684444) ##PORT 
OUT ...USR (S+454) ##PORT#*DATA 
RAMTOP ...USR (S+468)#*NEW RAMTOP 
НЕЕ” | RAND USR (5+507) *#NO. 
RAMSAVE (PROGRAM) ...USR (S*585) *xPX«DESTINATION 
(VARIABLES) ...USR (+584) ж/ж DESTINATION 
RAMLOAD (PROGRAM) ...USR (6%850) ##P*#*SOURCE 


(VARIABLES) «s USR (94+465@) ##V##S0URCE 


TAPESAVE (VARIABLES) .. USR (5+718) «V 


(BINARY) ...ШӨК (5+718) sBX*SQURCEX*NO. OF BYTES 
TAPELOAD (VARIABLES) ss USR (5+895) «V 

(BINARY) ...USR (§+835) &*B* DESTINATION 

("X" LOAD) ...USR (5%835) &XX«DESTINATION*«ND. OF BYTES 
EYTES FREE ...ШӨК (6%1028) 


SYSTEM VARIABLES’ ADDRESSES 


D-FILE «ШБК (6%1045) 
VARS ...05К (5%1050) 
ELIN ...Ц5К (6%1055) 
RMTP .. USR (S+1060) 


"S" equals the STARTING ADDRESS of KAPKIT. 
Begin hex numbers with "H" and follow that with a four digit hex nuaber. 


LST Software 

Chuck Peterson 

Вох 62 

Alcester, SO 3728801 
April 27, 1987 


SyncWare News 

Jeff Moore, Ed. 

643 8. Mill St. 
Louisville, ОН 44441 


Dear Me. Moore, 


I'm taking this opportunity to send you а copy of а new utility 
program for the 2Х81 and T/S 120% — КАРКІТ ig. I'm sending it 
for your personal use and perusal. You may wish to review it in 
БАМ оғ have someone else do sa. 


It is available from me at LST Software or from the E. Arthur 
Brown Co. The cost is $14.95 plus $1.95 shipping and handling. 
Flease mention this product in the "For Your Support" column of 
SyncWare News. I have also sent a sample copy to Time Designs 
Magazine. 


| find a cassette tape with KAPKIT 1200. on both 
sides; a fourteen page manual, and an advertizing sheet. Load 
the tape and follow the manual. I think you will be pleased at 
what you can do with ЕК. 


An article on "typing in" the machine code for КАРКТТ 18488 is 
scheduled to be printed in the Т/б 1@@@ journal (now being 
edited by Fred Nachbaur). The cassette tape has two routines on 
it which are not in the article: TAPESAVE and TAPELOAD. Hope you 
enjoy ЕЕ. 


Keep up the good work in editing SWN. I look forward to every 
issue. 


ПЕРУ» A 


Chuck Feterson 


